home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 30 / Amiga Format AFCD30 (Sep 1998, Issue 114).iso / -seriously_amiga- / workbench / backclock / install < prev    next >
Text File  |  1998-06-18  |  3KB  |  122 lines
  1. ;/* install script version 1.1
  2. ; * $VER: BCInstall 1.1 (10-02-98)
  3. ; */
  4.  
  5.  
  6. (set #inst_text "BackClock Installation on Hard Disk")
  7. (set #prog "backclock")
  8. (set @minuser "Intermediate")
  9. (set @appname "BackClock")
  10. (set #gosrc      1)
  11. (set #gobootup   1)
  12. (set #defpathprefs "sys:prefs/")
  13.  
  14.  
  15. (set #destdir_prompt "Where do you want to install BackClock\nA drawer will be created.")
  16. (set #destdirprefs   "Where do you want to install BackClock preferences.")
  17.  
  18. (set #destdir (askdir
  19.     (prompt #destdir_prompt)
  20.     (help @askdir-help)
  21.     (default "Work:")
  22.   )
  23. )
  24.  
  25. (set @default-dest (tackon #destdir "BackClock"))
  26. (if (not (exists (@default-dest)))
  27.   (makedir @default-dest (infos))
  28. )
  29. (if (>= @user-level 1)
  30.   (set #gobootup
  31.     (askbool
  32.       (prompt "Do you want to run BackClock each startup ?")
  33.       (help   "If you answer yes, then BackClock will be copied to SYS:WBStartup.")
  34.     )
  35.   )
  36. )
  37.  
  38. (set #sourcepath @default-dest)
  39.  
  40. (if (>= @user-level 1)
  41.   (set #defpathprefs (askdir
  42.     (prompt #destdirprefs)
  43.     (help   "Please choose where to place the preferences utility.")
  44.     (default #defpathprefs)
  45.     )
  46.   )
  47. )
  48. (if (>= @user-level 1)
  49.   (if (askbool
  50.         (prompt "Do you want to install sources ?")
  51.         (help   "This will install the sources of the program in the directory sources./")
  52.       )
  53.       (
  54.         ;install sources
  55.         (set #gosrc 1)
  56.         (if (= 2 @user-level)
  57.           (
  58.             (set #sourcepath (askdir
  59.                 (prompt "Where do you want to install sources codes ?\nA drawer called sources will be created there.")
  60.                 (help   "You have to choose where the sources be placed.")
  61.                 (default @default-dest)
  62.               )
  63.             )
  64.           )
  65.         )
  66.       )
  67.       ; don't install sources
  68.       (set #gosrc 0)
  69.   )
  70. )
  71.  
  72. (if (= 1 #gosrc)
  73.   ((if (not (exists (tackon #sourcepath "sources")))
  74.                (makedir (tackon #sourcepath "sources"))
  75.             )
  76.   )
  77. )
  78.  
  79. (copyfiles
  80.   (prompt "Copying Main file")
  81.   (help   "Copy the executable and the icon of the main file in the path you choosed")
  82.   (source "bin/")
  83.   (dest   @default-dest)
  84.   (all)
  85. )
  86. (copyfiles
  87.   (prompt "Copying preferences program")
  88.   (help   "Copy the preferences executable and the icon file in the path you choosed")
  89.   (source "prefs/")
  90.   (dest   #defpathprefs)
  91.   (all)
  92. )
  93.  
  94. (copyfiles
  95.   (prompt "Cpying documentation")
  96.   (help   "Copy the documentation in the path you choosed")
  97.   (source "docs/backclock.guide")
  98.   (dest   @default-dest)
  99.   (infos)
  100. )
  101.  
  102. (if (= 1 #gobootup)
  103.   (copyfiles
  104.     (prompt "Copying to WBStartup")
  105.     (help   "Copy the executable file to wbstartup\nThis will run BackClock each reboot.")
  106.     (source "bin/backclock")
  107.     (dest   "SYS:WBstartup/")
  108.     (infos)
  109.   )
  110. )
  111.  
  112. (if (= 1 #gosrc)
  113.   (copyfiles
  114.     (prompt "Copying sources")
  115.     (help   "Copy the sources in C in the the path you choosed")
  116.     (source "sources/")
  117.     (dest   (tackon #sourcepath "sources"))
  118.     (all)
  119.   )
  120. )
  121.  
  122.